home *** CD-ROM | disk | FTP | other *** search
/ Canadian Geographic Explorer / Canadian Geographic Explorer.iso / pc / riddler.dxr / 00038_Key Assign.ls < prev    next >
Encoding:
Text File  |  1996-10-03  |  600 b   |  26 lines
  1. on exitFrame
  2.   global gNumPlayers, gVoiceChannel, gPathToSound, fileDelimiter, gPlayerCounter
  3.   if soundBusy(gVoiceChannel) then
  4.     go(the frame + 1)
  5.   else
  6.     set gPlayerCounter to gPlayerCounter + 1
  7.     if gPlayerCounter > gNumPlayers then
  8.       go("Start Game")
  9.     else
  10.       sound playFile gVoiceChannel, gPathToSound & "rules" & fileDelimiter & "R300" & gPlayerCounter & "_" & random(2) & ".aif"
  11.     end if
  12.   end if
  13. end
  14.  
  15. on keyDown
  16.   global gVoiceChannel
  17.   sound stop gVoiceChannel
  18.   go("Start Game")
  19. end
  20.  
  21. on mouseDown
  22.   global gVoiceChannel
  23.   sound stop gVoiceChannel
  24.   go("Start Game")
  25. end
  26.